{$CLEO .cm}
{$NOSOURCE}

thread "Weaponstonebattle9x"

:WeaponLeech
wait 0
04B8: get_weapon_data_from_actor $PLAYER_ACTOR slot 1 weapon 1@ ammo 11@ model 21@
04B8: get_weapon_data_from_actor $PLAYER_ACTOR slot 2 weapon 2@ ammo 12@ model 22@
04B8: get_weapon_data_from_actor $PLAYER_ACTOR slot 3 weapon 3@ ammo 13@ model 23@
04B8: get_weapon_data_from_actor $PLAYER_ACTOR slot 4 weapon 4@ ammo 14@ model 24@
04B8: get_weapon_data_from_actor $PLAYER_ACTOR slot 5 weapon 5@ ammo 15@ model 25@
04B8: get_weapon_data_from_actor $PLAYER_ACTOR slot 6 weapon 6@ ammo 16@ model 26@
04B8: get_weapon_data_from_actor $PLAYER_ACTOR slot 7 weapon 7@ ammo 17@ model 27@
04B8: get_weapon_data_from_actor $PLAYER_ACTOR slot 8 weapon 8@ ammo 18@ model 28@
04B8: get_weapon_data_from_actor $PLAYER_ACTOR slot 9 weapon 9@ ammo 19@ model 29@
04B8: get_weapon_data_from_actor $PLAYER_ACTOR slot 10 weapon 10@ ammo 20@ model 30@
04B8: get_weapon_data_from_actor $PLAYER_ACTOR slot 11 weapon 31@ ammo 32@ model 0@
048F: actor $PLAYER_ACTOR remove_weapons
wait 0
0247: load_model 347
038B: load_requested_models
01B2: give_actor $PLAYER_ACTOR weapon 44 ammo 1
01B2: give_actor $PLAYER_ACTOR weapon 23 ammo 50
:WeaponSteer
wait 0
if
80A4:   actor $PLAYER_ACTOR sphere 0 in_cube_cornerA -1199.3984 -908.0161 127.234 cornerB -1000.7458 -1067.7887 1290.2187
jf @WeaponSteer
wait 500
Player.CanMove($PLAYER_CHAR) = False
048F: actor $PLAYER_ACTOR remove_weapons
:Load_ends_here
0924: enable_screen_darkness 1 with_value 30
0001: wait 0 ms
0924: enable_screen_darkness 1 with_value 70
0001: wait 0 ms
0924: enable_screen_darkness 1 with_value 110
0001: wait 0 ms
0924: enable_screen_darkness 1 with_value 150
0001: wait 0 ms
0924: enable_screen_darkness 1 with_value 190
0001: wait 0 ms
0924: enable_screen_darkness 1 with_value 230
0001: wait 0 ms
0924: enable_screen_darkness 1 with_value 255
   Model.Load(21@)
   Model.Load(22@)
   Model.Load(23@)
   Model.Load(24@)
   Model.Load(25@)
   Model.Load(26@)
   Model.Load(27@)
   Model.Load(28@)
   Model.Load(29@)
   Model.Load(30@)
   Model.Load(0@)
038B: load_requested_models
wait 0
   Actor.GiveWeaponAndAmmo($PLAYER_ACTOR, 1@, 11@)
   Actor.GiveWeaponAndAmmo($PLAYER_ACTOR, 2@, 12@)
   Actor.GiveWeaponAndAmmo($PLAYER_ACTOR, 3@, 13@)
   Actor.GiveWeaponAndAmmo($PLAYER_ACTOR, 4@, 14@)
   Actor.GiveWeaponAndAmmo($PLAYER_ACTOR, 5@, 15@)
   Actor.GiveWeaponAndAmmo($PLAYER_ACTOR, 6@, 16@)
   Actor.GiveWeaponAndAmmo($PLAYER_ACTOR, 7@, 17@)
   Actor.GiveWeaponAndAmmo($PLAYER_ACTOR, 8@, 18@)
   Actor.GiveWeaponAndAmmo($PLAYER_ACTOR, 9@, 19@)
   Actor.GiveWeaponAndAmmo($PLAYER_ACTOR, 10@, 20@)
   Actor.GiveWeaponAndAmmo($PLAYER_ACTOR, 31@, 32@)
01B9: set_actor $PLAYER_ACTOR armed_weapon_to 0 
wait 0
0924: enable_screen_darkness 1 with_value 255
0001: wait 0 ms
0924: enable_screen_darkness 1 with_value 230
0001: wait 0 ms
0924: enable_screen_darkness 1 with_value 190
0001: wait 0 ms
0924: enable_screen_darkness 1 with_value 150
0001: wait 0 ms
0924: enable_screen_darkness 1 with_value 110
0001: wait 0 ms
0924: enable_screen_darkness 1 with_value 70
0001: wait 0 ms
0924: enable_screen_darkness 1 with_value 30
0001: wait 0 ms
0924: enable_screen_darkness 0 with_value 0
Player.CanMove($PLAYER_CHAR) = True
0A93: end_custom_thread
   
   
   